1 SCREEN2,0,0:CLS:FORI=&H400TO&H4032:READC$:C=VAL("&H"+C$):POKEI,C:NEXT:DATA4F,3F,0A,C1,00,27,F9,C1,02,27,1A,CE,40,26,E1,C0,27,07,81,0C,27,EA,4C,20,F5,8B,31,B7,8F,FF,F6,8F,FF,3F,1E,20,DB,39,53,45,44,52,46,47,59,48,55,4A,49,4B,4C
2 INPUT"ATT,OCT,TEMP,LONG";A,O,T,L:A$=MID$(STR$(A),2):O$=MID$(STR$(O),2):T$=MID$(STR$(T),2):L$=MID$(STR$(L),2):PLAY"O"+O$+"T"+T$""L"+L$+"A"+A$:EXEC&H4000:INPUT"ON CHANGE DE PARAMETRES (O/N)";R$:IFR$="O"THEN2ELSEEND